library(knitr)
input <- "[61]rmd2word.Rmd"
env <- new.env()
assign("table.format", "markdown", env)
output <- knit(input, envir = env, encoding = "UTF-8")
pandoc(output, format = "docx")
\( \alpha+\beta=\gamma^2 \) などの数式も変換できる。データフレームは kable関数 で整形しておくと表に変換される。
kable(head(cars))
speed | dist |
---|---|
4 | 2 |
4 | 10 |
7 | 4 |
7 | 22 |
8 | 16 |
9 | 10 |
<m:t>
を <w:rFonts w:hAnsi="Cambria Math" w:ascii="Cambria Math"/><m:t>
に置換し保存するWordへの変換イメージは次のようになる